home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 4 / The Arsenal Files 4 (Arsenal Computer).ISO / ham / sattrk31.tgz / sattrack-3.1.tar / SatTrack / run / gettle < prev    next >
Text File  |  1995-03-14  |  2KB  |  95 lines
  1. #! /bin/csh
  2. #
  3. # gettle      -----      Manfred Bester  14Mar95
  4. #
  5. # This C shell script can be invoked manually or by cron at a specified time.
  6. # It calls up 'archive.afit.af.mil' (129.92.1.66) and gets the most recent 
  7. # files with Keplerian two-line element sets, as used with SatTrack. 
  8. # After placing the files into SatTrack/tle, program 'tlexgen' is invoked. 
  9. # This program generates an extra file 'tlex.dat' with extended two-line 
  10. # element sets. It basically concatenates several tle files into a larger data 
  11. # base which is used in turn as the default data base for SatTrack. Duplicate 
  12. # entries are eliminated by the object number. The tle files that are 
  13. # concatenated are specified in the input file 'tlelist.dat' in SatTrack/data. 
  14. # Finally, program 'selectsat' is invoked to generate an abbreviated list of 
  15. # two-line element sets for a specified satellite group (e.g. am, sci, wx), 
  16. # which may be used for further distribution to users interested in that 
  17. # particular satellite group. 
  18. #
  19. # If SatTrack is not installed in the user's home directory, the variable 
  20. # 'satdir' needs to be changed to the name of the directory that SatTrack is 
  21. # installed under. The variable 'satuser' is the UID of the user who is allowed 
  22. # to write into the system-wide SatTrack directory, i.e. the person in charge 
  23. # of maintaining SatTrack. 
  24. #
  25. #
  26. #
  27. set ftphost=129.92.1.66
  28. set satdir=/home/manfred
  29. set satuser=manfred
  30. #
  31. #
  32. #
  33. set userid=$USER@`hostname`.`domainname`
  34. #
  35. if ($USER == $satuser) then 
  36.     set satdirusr=$satdir
  37.     else
  38.     set satdirusr=$HOME
  39.     mkdir -p $satdirusr/SatTrack/tle
  40. endif
  41. #
  42. cd $satdirusr/SatTrack/tle
  43. #
  44. if ($1 == -v) then 
  45.     echo $userid
  46.     echo calling $ftphost ...
  47. endif
  48. #
  49. ftp $1 -n $ftphost << !
  50. user anonymous -$userid
  51. cd /pub/space
  52. get tle.new
  53. get gorizont.tle
  54. get other.tle
  55. get tvro.tle
  56. get visual.tle
  57. quit
  58. !
  59. #
  60. if ($1 == -v) then 
  61.     echo saving data files ...
  62. endif
  63. #
  64. "cp" tle.dat tle.bak
  65. "mv" tle.new tle.dat
  66. "mv" gorizont.tle gorizont.dat
  67. "mv" other.tle debris.dat
  68. "mv" tvro.tle tvro.dat
  69. "mv" visual.tle visual.dat
  70. #
  71. if ($1 == -v) then 
  72.     echo running 'maketlex' ...
  73. endif
  74. #
  75. maketlex
  76. #
  77. if ($1 == -v) then 
  78.     echo running 'maketles' ...
  79. endif
  80. #
  81. maketles am
  82. #
  83. if ($1 == -v) then 
  84.     echo running 'satfilter' ...
  85. endif
  86. #
  87. satfilter leoe
  88. satfilter leom
  89. satfilter leop
  90. #
  91. if ($1 == -v) then 
  92.     echo done.
  93. endif
  94. #
  95.